home *** CD-ROM | disk | FTP | other *** search
/ Just Call Me Internet / Just Call Me Internet.iso / prog / atari / c / stut_src / generic.c < prev    next >
C/C++ Source or Header  |  1996-05-27  |  19KB  |  826 lines
  1. /*
  2.  * generic.c
  3.  *
  4.  * Purpose:
  5.  * -------- 
  6.  * routines de gestion de page g‚n‚riques:
  7.  *
  8.  * History:
  9.  * --------
  10.  * 21.01.95: fplanque: Created
  11.  */
  12.  
  13.  
  14.      #include "!OPTIONS.H"                /* Options de compilation */         
  15.     #define    THIS_FILE    "GENERIC.C v1.00 - 03.95"
  16.           
  17.  
  18. /*
  19.  * System headers:
  20.  */
  21.     #include    <stdio.h>                    /* header standard */
  22.     #include <string.h>                    /* header tt de chaines */
  23.     #include    <stdlib.h>                    /* Pour malloc etc.. */
  24.     #include <tos.h>   
  25.  
  26. /*
  27.  * Custom headers:
  28.  */
  29.     #include    "ARB_OUT.H"
  30.     
  31.     #include "SPEC_PU.H"
  32.  
  33.     #include "DEF_ARBO.H"
  34.     #include "DATPG_PU.H"
  35.     #include "DBSYS_PU.H"
  36.     #include    "DEBUG_PU.H"    
  37.     #include    "SERV_PU.H"
  38.     #include    "LINE0_PU.H"
  39.     #include    "DBINT_PU.H"
  40.     #include    "IOFLD_PU.H"
  41.     #include "TERM_PU.H"
  42.     #include "TEXT_PU.H"
  43.     #include "ARBGENPU.H"
  44.  
  45. /*
  46.  * private
  47.  */
  48. char * Format_Number(
  49.             int        number,        /* In: Nbre … formatter */
  50.             int        n_Format,    /* In: Format d‚sir‚ */
  51.             int        n_Len );        /* In: Longueur du champ */
  52. char * Format_Date(
  53.             const time_t * timer,        /* In: Date … formatter */
  54.             int                n_Format );    /* In: Format d‚sir‚ */
  55. char * Format_FAttrib(
  56.             unsigned char    uc_Attrib,    /* In: Date … formatter */
  57.             int                n_Format );    /* In: Format d‚sir‚ */
  58. char * Format_Size(
  59.             size_t    size,            /* In: Date … formatter */
  60.             int        n_Format,    /* In: Format d‚sir‚ */
  61.             int        n_Len );        /* In: Longueur du champ */
  62.  
  63. /*
  64.  * --------------------------- METHODES -------------------------------
  65.  */
  66.  
  67.  
  68.  
  69. /*
  70.  * OutFields_DisplayGroup(-)
  71.  *
  72.  * Purpose:
  73.  * --------
  74.  * Affiche tous les champs d'un groupe donn‚
  75.  * Avec effacement pr‚alable pour les champs l'ayant demand‚
  76.  *
  77.  * History:
  78.  * --------
  79.  * 24.01.95: Created: new concept for data display
  80.  * 25.01.95: gŠre offsets
  81.  * 30.01.95: ne traite pas les champs disabled
  82.  * 24.03.95: gestion infos directory
  83.  */
  84. void    OutFields_DisplayGroup(
  85.                 VOIE    *    pVoie_curr,            /* In: Voie concern‚e */
  86.                 UINT        u_GroupId,            /* In: Groupe … afficher */
  87.                 int        n_XOffset,            /* In: Offsets … appliquer aux coordonn‚es des champs */            
  88.                 int        n_YOffset )
  89. {
  90.     PAGEARBO         *    pPageArbo = pVoie_curr -> arboparams;
  91.     ARBO_FIELDPARS    *     pFieldPars_Output;
  92.     OUTPUT_FPAR        *    pOutput_FPar;
  93.     OUTPUT_FPAR        *    pOutput_FPar_CurrScroll = NULL;
  94.     char                *    psz;
  95.  
  96.     /*
  97.      * Beaucoup de champs portent sur l'enregistrement
  98.      * en cours de visualisation:
  99.      */
  100.     COMPACT_RECORD    *    pCompactRec = pVoie_curr -> curr_comprec;
  101.     RECORD_NUMBER    *    pRecNumber    = NULL;
  102.     if( pCompactRec != NULL )
  103.     {    /*
  104.          * Num‚ro de diff‚rentiation de l'enregistrement:
  105.          */
  106.          pRecNumber    = &(pCompactRec -> data.header .header .rec_idnb); 
  107.     }
  108.  
  109.  
  110.     /*
  111.      * Champ scrollable courant:
  112.      */
  113.     if( pVoie_curr -> pIOField_CurrOut != NULL )
  114.     {
  115.         pOutput_FPar_CurrScroll = pVoie_curr -> pIOField_CurrOut -> FPar.Output;
  116.     }
  117.  
  118.  
  119.     /*
  120.      * -------------------------
  121.      * Parcourt tous les champs:
  122.      * En vue de leur effacement:
  123.      * -------------------------
  124.      */
  125.     for( pFieldPars_Output = pPageArbo -> output_fields ;
  126.             pFieldPars_Output != NULL ;
  127.              pFieldPars_Output = pFieldPars_Output -> next )
  128.     {
  129.         pOutput_FPar = &(pFieldPars_Output -> data.output);
  130.     
  131.         /*
  132.          * V‚rifie l'appartenance du champ au groupe demand‚:
  133.          */
  134.         if( pOutput_FPar -> OutFieldFlags.u_GroupId != u_GroupId
  135.             || pOutput_FPar -> OutFieldFlags.b_enabled == FALSE0 )
  136.         {    /*
  137.              * Ce champ ne nous int‚resse pas,
  138.              * on passe au suivant:
  139.              */
  140.             continue;
  141.         }
  142.  
  143.         /*
  144.          * Efface le champ:
  145.          */
  146.         OutField_Clear( pVoie_curr, pOutput_FPar, n_XOffset, n_YOffset );
  147.          
  148.     }
  149.  
  150.  
  151.     /*
  152.      * -------------------------
  153.      * Parcourt tous les champs:
  154.      * En vue de leur affichage:
  155.      * -------------------------
  156.      */
  157.     for( pFieldPars_Output = pPageArbo -> output_fields ;
  158.             pFieldPars_Output != NULL ;
  159.              pFieldPars_Output = pFieldPars_Output -> next )
  160.     {
  161.         pOutput_FPar = &(pFieldPars_Output -> data.output);
  162.     
  163.         /*
  164.          * V‚rifie l'appartenance du champ au groupe demand‚:
  165.          */
  166.         if( pOutput_FPar -> OutFieldFlags.u_GroupId != u_GroupId
  167.             || pOutput_FPar -> OutFieldFlags.b_enabled == FALSE0 )
  168.         {    /*
  169.              * Ce champ ne nous int‚resse pas,
  170.              * on passe au suivant:
  171.              */
  172.             continue;
  173.         }
  174.  
  175.         /* printf("\nAffiche champ: %o %d %x  ", pOutput_FPar -> fnct_no, pOutput_FPar -> fnct_no, pOutput_FPar -> fnct_no ); */
  176.          
  177.         if( pOutput_FPar_CurrScroll != NULL && pOutput_FPar_CurrScroll == pOutput_FPar )
  178.         {    /*
  179.              * S'il s'agit du champ principal en cours de consultation
  180.              * (celui qu'on peut scroller avec suite/retour)
  181.              * On affiche le texte d‚j… formatt‚ au pr‚alabale et on le
  182.              * garde en ram pour plus tard (scroll...):
  183.              */
  184.             OutField_Display( pVoie_curr, pVoie_curr -> pIOField_CurrOut, n_XOffset, n_YOffset );
  185.  
  186.             /*
  187.              * Passe au champ suivant:
  188.              */
  189.             continue;
  190.         }
  191.     
  192.     
  193.         /*
  194.          * En fonction du type de champ:
  195.          */
  196.         switch( pOutput_FPar -> fnct_no )
  197.         {
  198.             case    FO_COMMENT:
  199.             {    /*
  200.                  * Commentaire de la page arbo:
  201.                  */
  202.                 char *    cpsz_Comment = pVoie_curr -> arbopage -> comment;
  203.                 if( cpsz_Comment != NULL )
  204.                 {
  205.                     IOField_DisplayText( pVoie_curr, pOutput_FPar, n_XOffset, n_YOffset, cpsz_Comment, strlen( cpsz_Comment ) );
  206.                 }
  207.                 break;
  208.             }
  209.             
  210.             
  211.             case    FO_DATACOMMENT:
  212.                 /*
  213.                  * Commentaire de la base de donn‚es affich‚e:
  214.                  */
  215.                 if( pVoie_curr -> database != NULL )
  216.                 {
  217.                     char *    cpsz_Comment = pVoie_curr -> database -> comment;
  218.                     if( cpsz_Comment != NULL )
  219.                     {
  220.                         IOField_DisplayText( pVoie_curr, pOutput_FPar, n_XOffset, n_YOffset, cpsz_Comment, strlen( cpsz_Comment ) );
  221.                     }
  222.                 }
  223.                 break;
  224.  
  225.  
  226.             case    FO_TEXTCOMMENT:
  227.                 /*
  228.                  * Commentaire du texte affich‚:
  229.                  */
  230.                 if( pVoie_curr -> pDataPage_OpenText != NULL )
  231.                 {
  232.                     char *    cpsz_Comment = pVoie_curr -> pDataPage_OpenText -> comment;
  233.                     if( cpsz_Comment != NULL )
  234.                     {
  235.                         IOField_DisplayText( pVoie_curr, pOutput_FPar, n_XOffset, n_YOffset, cpsz_Comment, strlen( cpsz_Comment ) );
  236.                     }
  237.                 }
  238.                 break;
  239.  
  240.  
  241.             case    FO_RECNUMBER:
  242.                 /*
  243.                  * No de record courant:
  244.                  */
  245.                 psz = Format_Number( pVoie_curr -> n_RecIndex_Curr, pOutput_FPar -> n_Format, pOutput_FPar -> w );
  246.                 IOField_DisplayString( pVoie_curr, pOutput_FPar, n_XOffset, n_YOffset, psz );
  247.                 break;
  248.  
  249.  
  250.             case    FO_PAGENUMBER:
  251.                 /*
  252.                  * No de page courante:
  253.                  */
  254.                 psz = Format_Number( pVoie_curr -> n_PageNumber_Curr, pOutput_FPar -> n_Format, pOutput_FPar -> w );
  255.                 IOField_DisplayString( pVoie_curr, pOutput_FPar, n_XOffset, n_YOffset, psz );
  256.                 break;
  257.  
  258.  
  259.             case    FO_CREATEDATE:
  260.                 /*
  261.                   * Date de cr‚ation RECORD:
  262.                   */
  263.                 if( pRecNumber == NULL )
  264.                 {
  265.                     break;
  266.                 }
  267.  
  268.                 psz = Format_Date( &(pRecNumber -> date), pOutput_FPar -> n_Format ); 
  269.                 IOField_DisplayString( pVoie_curr, pOutput_FPar, n_XOffset, n_YOffset, psz );
  270.  
  271.                 break;
  272.             
  273.             
  274.             case    FO_PUBPRIV:
  275.                 /*
  276.                  * Enregsitrement public ou priv‚:
  277.                  */
  278.                 if( pRecNumber != NULL )
  279.                 {
  280.                     RECORD_FLAGS    RecFlags = CompRec_GetRecFlags( pCompactRec );
  281.                     const char *     cpsz_PubPriv;
  282.  
  283.                     if( RecFlags .b_Private )
  284.                     {
  285.                         cpsz_PubPriv = "V";
  286.                     }
  287.                     else
  288.                     {
  289.                         cpsz_PubPriv = "P";
  290.                     }
  291.                     IOField_DisplayString( pVoie_curr, pOutput_FPar, n_XOffset, n_YOffset, cpsz_PubPriv );
  292.                 }
  293.                 break;
  294.  
  295.             case    FO_PATH:            /* Chemin d'accŠs courant */        
  296.                 psz = pVoie_curr -> pMsz_Path;
  297.                 IOField_DisplayText( pVoie_curr, pOutput_FPar, n_XOffset, n_YOffset, psz, len_String(psz) );
  298.                 break;
  299.                 
  300.             case    FO_NBFILES:
  301.                 /*
  302.                  * Nbre de fichiers ds dir courant:
  303.                  */
  304.                 psz = Format_Number( pVoie_curr -> nb_DirEnt, pOutput_FPar -> n_Format, pOutput_FPar -> w );
  305.                 IOField_DisplayString( pVoie_curr, pOutput_FPar, n_XOffset, n_YOffset, psz );
  306.                 break;
  307.  
  308.             case    FO_FILENAME:    /* Nom de fichier */
  309.             case    FO_FILEATTRIB:    /* Nom de fichier */
  310.             case    FO_FILEDATE:    /* Date de maj du fichier */
  311.             case    FO_FILESIZE:    /* Taille du fichier */
  312.             {
  313.                 DIRENTRY    **    TpDirEnt = pVoie_curr -> TpDirEnt;
  314.                 DIRENTRY    *    pDirEnt;
  315.                 if( TpDirEnt == NULL )
  316.                 {
  317.                     break;
  318.                 }
  319.                 pDirEnt = TpDirEnt[ pVoie_curr -> n_RecIndex_Curr -1 ];
  320.                 
  321.                 switch( pOutput_FPar -> fnct_no )
  322.                 {
  323.                     case    FO_FILENAME:    /* Nom de fichier */
  324.                         psz = pDirEnt -> sz_fname;
  325.                         IOField_DisplayString( pVoie_curr, pOutput_FPar, n_XOffset, n_YOffset, psz );
  326.                         break;
  327.     
  328.                     case    FO_FILEATTRIB:    /* Attributs */
  329.                         psz = Format_FAttrib( pDirEnt -> uc_attrib, pOutput_FPar -> n_Format ); 
  330.                         IOField_DisplayString( pVoie_curr, pOutput_FPar, n_XOffset, n_YOffset, psz );
  331.                         break;
  332.     
  333.                     case    FO_FILEDATE:    /* Date de maj du fichier */
  334.                         psz = Format_Date( &(pDirEnt -> time_LastChange), pOutput_FPar -> n_Format ); 
  335.                         IOField_DisplayString( pVoie_curr, pOutput_FPar, n_XOffset, n_YOffset, psz );
  336.                         break;
  337.     
  338.                     case    FO_FILESIZE:    /* Taille du fichier */
  339.                         psz = Format_Size( pDirEnt -> ul_length, pOutput_FPar -> n_Format, pOutput_FPar -> w );
  340.                         IOField_DisplayString( pVoie_curr, pOutput_FPar, n_XOffset, n_YOffset, G_tmp_buffer );
  341.                         break;
  342.                 }
  343.                 break;
  344.             }
  345.  
  346.             case    FO_USERNAME:    /* USER Login/Username/Pseudo */
  347.             case    FO_FIRSTNAME:    /* 1STN pr‚nom */
  348.             case    FO_LASTNAME:    /* LSTN nom */
  349.             case    FO_TITLE:        /* MTIT Aff du titre */
  350.             case    FO_TEXT:            /* MTXT Affichage du texte */
  351.             case    FO_DSTA:            /* DSTA Adresse destination */
  352.             case    FO_MPSE:            /* MPSE Pseudo Auteur */
  353.             /* case    DB_FIELD:     / user database code */
  354.             {    /*
  355.                  * On veut l'affichage d'un champ de base de donn‚es:
  356.                  * Il faut commencer par trouver ce champ dans le record courant:
  357.                  */
  358.                 COMPACT_FIELD *     pCompField = Find_FieldinCompactRecord( pCompactRec, pOutput_FPar -> ul_CodeChamp );
  359.                 if( pCompField == NULL || pCompField -> size_FieldLen == 0 )
  360.                 {    /*
  361.                      * Si le champ voulu n'est pas disponible dans ce record:
  362.                      */
  363.                     break;
  364.                 }
  365.  
  366.                 /* Affiche nom du champ: */
  367.                 /*    printf("Champ %c%c%c%c: ", rec_ptr[0], rec_ptr[1], rec_ptr[2], rec_ptr[3]); */
  368.  
  369.                 /*
  370.                  * Affichage du champ:
  371.                  */
  372.                 IOField_DisplayText( pVoie_curr, pOutput_FPar, n_XOffset, n_YOffset, (char*) (pCompField -> bytes), pCompField -> size_FieldLen );
  373.  
  374.                 break;            
  375.             }
  376.             
  377.             default:
  378.                 /*
  379.                  * Ne sait pas afficher ce champ:
  380.                  */
  381.                 ping();
  382.                 sprintf( G_tmp_buffer, "WARNING: Ne sait pas afficher OutField Fnct %d", pOutput_FPar -> fnct_no );
  383.                 add_textinf( pVoie_curr -> wi_params, G_tmp_buffer );
  384.                 break;
  385.         }
  386.     }
  387. } 
  388.  
  389.  
  390. /*
  391.  * Format_Number(-)
  392.  *
  393.  * Formattage d'un nombre selon format d‚sir‚
  394.  *
  395.  * 26.03.95: Created
  396.  */  
  397. char * Format_Number(
  398.             int        number,        /* In: Nbre … formatter */
  399.             int        n_Format,    /* In: Format d‚sir‚ */
  400.             int        n_Len )        /* In: Longueur du champ */
  401. {
  402.     static    FNCTSPEC     fnspec_Numbers[]=
  403.     {
  404.         FMT_NUMBER_LEFT,    "%d",
  405.         FMT_NUMBER_RIGHT,    "%*d",
  406.         FMT_NUMBER_ZEROS,    "%0*d"
  407.     };
  408.     
  409.     const char * cpsz_Format = fnct_spec( fnspec_Numbers, n_Format ) -> fnct_name;
  410.  
  411.     if( n_Format < FMT_NUMBER_RIGHT )
  412.     {    /*
  413.          * La longueur du champ n'intervient pas!
  414.          */
  415.         sprintf( G_tmp_buffer, cpsz_Format, number );
  416.     }
  417.     else
  418.     { 
  419.         sprintf( G_tmp_buffer, cpsz_Format, n_Len, number );
  420.     }
  421.     
  422.     return    G_tmp_buffer;
  423. }
  424.  
  425.  
  426. /*
  427.  * Format_Date(-)
  428.  *
  429.  * Formattage d'une date selon format d‚sir‚
  430.  *
  431.  * 25.03.95: Created
  432.  */  
  433. char * Format_Date(
  434.             const time_t * timer,        /* In: Date … formatter */
  435.             int                n_Format )    /* In: Format d‚sir‚ */
  436. {
  437.     static    FNCTSPEC     fnspec_Dates[]=
  438.     {
  439.         FMT_DATE_STD,        "%T",                            /* Fri Mar 24 23:00:00 1995 */
  440.         FMT_DATE_JmAAHMS,    "%D %N %Y %H:%M:%S",        /* 24 Mar 1995 23:00:00 */
  441.         FMT_DATE_JmAHMS,    "%D %N %y %H:%M:%S",        /* 24 Mar 95 23:00:00 */
  442.         FMT_DATE_JMAAHMS,    "%D.%n.%Y %H:%M:%S",        /* 24.03.1995 23:00:00 */
  443.         FMT_DATE_JMAHMS,    "%D.%n.%y %H:%M:%S",        /* 24.03.95 23:00:00 */
  444.         FMT_DATE_JMHMS,    "%D/%n %H:%M:%S",            /* 24/03 23:00:00 */
  445.         FMT_DATE_JJMAHMS,    "%J %D.%n.%y %H:%M:%S",    /* Fri 24.03.95 23:00:00 */
  446.         FMT_DATE_JJMHMS,    "%J %D/%n %H:%M:%S",        /* Fri 24/03 23:00:00 */
  447.         FMT_DATE_HMS,        "%H:%M:%S",                    /* 23:00:00 */
  448.         FMT_DATE_HMSP,        "%h:%M:%S %P",                /* 11:00:00 PM */
  449.         FMT_DATE_HMP,        "%h:%M %P",                    /* 11:00 PM */
  450.         FMT_DATE_H,         "%Hh",                        /* 23h */
  451.     };
  452.     
  453.     const char * cpsz_Time = ctime( timer );
  454.     
  455.     const char * cpsz_Format = fnct_spec( fnspec_Dates, n_Format ) -> fnct_name;
  456.  
  457.     const char * cpiBsz_Format = cpsz_Format;
  458.     char          * piBsz_Output = G_tmp_buffer;
  459.     char                car;
  460.     
  461.     while( (car = *(cpiBsz_Format++) ) != '\0' )
  462.     {
  463.         if( car == '%' )
  464.         {    /*
  465.              * Il faut faire un remplacement:
  466.              * Selon code donn‚ aprŠs %
  467.              */
  468.             const char * cpsz_Srce;
  469.             size_t         size; 
  470.              
  471.              
  472.             switch( *(cpiBsz_Format++) )
  473.             {
  474.                 case    'D':
  475.                     /*
  476.                      * Date  24
  477.                      */
  478.                     cpsz_Srce = cpsz_Time+8;
  479.                     size = 2;
  480.                     break;
  481.  
  482.                 case    'H':
  483.                     /*
  484.                      * Heure 23
  485.                      */
  486.                     cpsz_Srce = cpsz_Time+11;
  487.                     size = 2;
  488.                     break;
  489.  
  490.                 case    'h':
  491.                 {    /*
  492.                      * Heure 11:
  493.                      */
  494.                     int heure = atoi( cpsz_Time+11 );    
  495.                     if( heure > 12 )
  496.                     {
  497.                         heure %= 12;
  498.                     }
  499.                     sprintf( G_2nd_buffer, "%02d", heure );
  500.                     cpsz_Srce = G_2nd_buffer;
  501.                     size = 2;
  502.                 }
  503.                     break;
  504.                     
  505.                 case    'J':
  506.                     /*
  507.                      * Jour    Fri
  508.                      */
  509.                     cpsz_Srce = cpsz_Time;
  510.                     size = 3;
  511.                     break;
  512.  
  513.                 case    'M':
  514.                     /*
  515.                      * Minutes 00
  516.                      */
  517.                     cpsz_Srce = cpsz_Time+14;
  518.                     size = 2;
  519.                     break;
  520.  
  521.                 case    'N':
  522.                     /*
  523.                      * Mois Mar
  524.                      */
  525.                     cpsz_Srce = cpsz_Time+4;
  526.                     size = 3;
  527.                     break;
  528.  
  529.                 case    'n':
  530.                     /*
  531.                      * Mois 03
  532.                      */
  533.                     cpsz_Srce = NULL;
  534.  
  535.                     switch( cpsz_Time[ 4 ] )
  536.                     {
  537.                         case    'A':
  538.                             switch( cpsz_Time[ 5 ] )
  539.                             {
  540.                                 case    'p':
  541.                                     cpsz_Srce = "04";
  542.                                     break;
  543.                                 
  544.                                 case    'u':
  545.                                     cpsz_Srce = "08";
  546.                                     break;
  547.                             }
  548.                             break;
  549.                             
  550.                         case    'D':
  551.                             cpsz_Srce = "12";
  552.                             break;
  553.                         
  554.                         case    'F':
  555.                             cpsz_Srce = "02";
  556.                             break;
  557.                         
  558.                         case    'J':
  559.                             switch( cpsz_Time[ 5 ] )
  560.                             {
  561.                                 case    'a':
  562.                                     cpsz_Srce = "01";
  563.                                     break;
  564.                                 
  565.                                 case    'u':
  566.                                     switch( cpsz_Time[ 6 ] )
  567.                                         {
  568.                                             case    'n':
  569.                                                 cpsz_Srce = "06";
  570.                                                 break;
  571.                                             
  572.                                             case    'l':
  573.                                                 cpsz_Srce = "07";
  574.                                                 break;
  575.                                         }
  576.                                         break;
  577.                                 }
  578.                             break;
  579.                             
  580.                         case    'M':
  581.                             switch( cpsz_Time[ 6 ] )
  582.                             {
  583.                                 case    'r':
  584.                                     cpsz_Srce = "03";
  585.                                     break;
  586.                                 
  587.                                 case    'y':
  588.                                     cpsz_Srce = "05";
  589.                                     break;
  590.                             }
  591.                             break;
  592.  
  593.                         case    'O':
  594.                             cpsz_Srce = "10";
  595.                             break;
  596.  
  597.                         case    'N':
  598.                             cpsz_Srce = "11";
  599.                             break;
  600.  
  601.                         case    'S':
  602.                             cpsz_Srce = "09";
  603.                             break;
  604.                     }
  605.  
  606.                     if( cpsz_Srce == NULL )
  607.                     {
  608.                         cpsz_Srce = "?m";
  609.                     }
  610.                     size = 2;
  611.                     break;
  612.  
  613.                 case    'P':
  614.                     /*
  615.                      * AM/PM
  616.                      */
  617.                     if( cpsz_Time[11] == '2' ||
  618.                          (cpsz_Time[11] == '1' && cpsz_Time[12] >= '2' ) )
  619.                     {
  620.                         cpsz_Srce = "PM";
  621.                     }
  622.                     else
  623.                     {
  624.                         cpsz_Srce = "AM";
  625.                     }
  626.                     size = 2;
  627.                     break;
  628.  
  629.                 case    'S':
  630.                     /*
  631.                      * Secondes 00
  632.                      */
  633.                     cpsz_Srce = cpsz_Time+17;
  634.                     size = 2;
  635.                     break;
  636.  
  637.                 case    'T':
  638.                     /*
  639.                      * Time complet
  640.                      */
  641.                     cpsz_Srce = cpsz_Time;
  642.                     size = 24;
  643.                     break;
  644.  
  645.                 case    'Y':
  646.                     /*
  647.                      * Year 1995
  648.                      */
  649.                     cpsz_Srce = cpsz_Time+20;
  650.                     size = 4;
  651.                     break;
  652.     
  653.                 case    'y':
  654.                     /*
  655.                      * year 95
  656.                      */
  657.                     cpsz_Srce = cpsz_Time+22;
  658.                     size = 2;
  659.                     break;
  660.  
  661.                 default:
  662.                     /*
  663.                      * Code non reconnu:
  664.                      */
  665.                     cpsz_Srce = "?%";
  666.                     size = 2;
  667.             }
  668.  
  669.             strncpy( piBsz_Output, cpsz_Srce, size );
  670.             piBsz_Output += size;
  671.         }
  672.         else
  673.         {    /*
  674.              * On insŠre le caractŠre tel quel:
  675.              */
  676.             *(piBsz_Output++) = car;        
  677.         }
  678.     }
  679.  
  680.     /*
  681.      * Fin de chaine:
  682.      */    
  683.     *piBsz_Output = '\0';
  684.  
  685.     return    G_tmp_buffer;
  686. }            
  687.  
  688.  
  689. /*
  690.  * Format_FAttrib(-)
  691.  *
  692.  * Formattage des attributs de fichier selon format d‚sir‚
  693.  *
  694.  * 26.03.95: Created
  695.  */  
  696. char * Format_FAttrib(
  697.             unsigned char    uc_Attrib,    /* In: Date … formatter */
  698.             int                n_Format )    /* In: Format d‚sir‚ */
  699. {
  700.     FAKE_USE( n_Format );
  701.     
  702.     strcpy( G_tmp_buffer, "-----" );
  703.     
  704.     if( uc_Attrib & FA_SUBDIR )
  705.     {
  706.         G_tmp_buffer[0] = 'D';
  707.     }
  708.  
  709.     if( uc_Attrib & FA_READONLY )
  710.     {
  711.         G_tmp_buffer[1] = 'R';
  712.     }
  713.  
  714.     if( uc_Attrib & FA_HIDDEN )
  715.     {
  716.         G_tmp_buffer[2] = 'H';
  717.     }
  718.  
  719.     if( uc_Attrib & FA_SYSTEM )
  720.     {
  721.         G_tmp_buffer[3] = 'S';
  722.     }
  723.  
  724.     if( uc_Attrib & FA_ARCHIVE )
  725.     {
  726.         G_tmp_buffer[4] = 'A';
  727.     }
  728.  
  729.     return    G_tmp_buffer;
  730. }
  731.  
  732.  
  733. /*
  734.  * Format_Size(-)
  735.  *
  736.  * Formattage d'une taille de fichier selon format d‚sir‚
  737.  *
  738.  * 26.03.95: Created
  739.  */  
  740. char * Format_Size(
  741.             size_t    size,            /* In: Date … formatter */
  742.             int        n_Format,    /* In: Format d‚sir‚ */
  743.             int        n_Len )        /* In: Longueur du champ */
  744. {
  745.     if( n_Format == FMT_FILESIZE_KOCTETS && size > 0)
  746.     {
  747.         size /= 1024;    
  748.         if( size == 0 )
  749.         {
  750.             size = 1;
  751.         }
  752.     }
  753.     
  754.     sprintf( G_tmp_buffer, "%*lu", n_Len, size );
  755.     
  756.     return    G_tmp_buffer;
  757. }
  758.  
  759.  
  760.  
  761. /*
  762.  * Generic_DisplayPageChange(-)
  763.  *
  764.  * Purpose:
  765.  * --------
  766.  * Affiche les informations de la nouvelle page
  767.  * … laquelle on vient de se rendre
  768.  *
  769.  * Notes:
  770.  * ------
  771.  * Egalement utilis‚ par DISPTEXT.C
  772.  *
  773.  * History:
  774.  * --------
  775.  * 19.12.94: fplanque: Created
  776.  * 13.01.95: effacement des champs qui vont ˆtre renouvel‚s
  777.  * 21.01.95: chang‚ nom depuis LectMsg_DisplayPageChange()
  778.  * 24.01.95: n'efface plus les champs: c auto matok now
  779.  */
  780. void    Generic_DisplayPageChange(
  781.             VOIE *    pVoie_curr )    /* In: Voie concern‚e */
  782. {
  783.     register_action( pVoie_curr, DISP, FE_CHGPAGE, 0, NULL );        /* Demande affichage page ‚cran */
  784.     register_action( pVoie_curr, DPAG, 0, 0, NULL );        /* Affiche message */
  785.     register_action( pVoie_curr, CPOS, 0, 0, NULL );        /* Repositionne curseur pour continuer ‚dition */
  786.     register_action( pVoie_curr, WAIT, 0, 0, NULL );        /* Repasse en mode d'attente d'action */
  787. }
  788.  
  789.  
  790. /*
  791.  * Generic_DispPage(-)
  792.  *
  793.  * Purpose:
  794.  * --------
  795.  * Affiche une page du texte formatt‚ courant
  796.  *
  797.  * History:
  798.  * --------
  799.  * 18.12.94: fplanque: moved from LectMsg_DispMsg()
  800.  * 21.01.95: chang‚ nom depuis LectMsg_DispPage()
  801.  */
  802. void    Generic_DispPage(
  803.             VOIE *    pVoie_curr )    /* In: Voie concern‚e */
  804. {
  805.  
  806.     /*
  807.      * Calcul du num‚ro de page:
  808.      */
  809.     if( pVoie_curr -> pIOField_CurrOut != NULL )
  810.     {
  811.         long  l_TopLineText = pVoie_curr -> pIOField_CurrOut -> l_TopLine;
  812.         int    nb_LinesOnPage = pVoie_curr -> pOutputFPar_CurrOut -> h;
  813.         pVoie_curr -> n_PageNumber_Curr = (int) (l_TopLineText / nb_LinesOnPage) + 1;
  814.     }
  815.     else
  816.     {
  817.         pVoie_curr -> n_PageNumber_Curr = 0;
  818.     }
  819.  
  820.     /*
  821.      * Affichage des champs du groupe 4:
  822.      * (MTXT, no page)
  823.      */
  824.     OutFields_DisplayGroup( pVoie_curr, 4, 0, 0 );
  825. }
  826.